home *** CD-ROM | disk | FTP | other *** search
/ FishMarket 1.0 / FishMarket v1.0.iso / fishies / 526-550 / disk_549 / ffex / source / request.def < prev    next >
Text File  |  1992-05-06  |  851b  |  24 lines
  1. (* Modul   : Request                             *)
  2. (* Projekt : FFEX                             *)
  3. (* Autor   : Robert Brandner                         *)
  4. (* Funktion: Allround-Requester, Info-Requester, Limit-Requester     *)
  5.  
  6. DEFINITION MODULE Request;
  7.  
  8. FROM Intuition IMPORT WindowPtr,ScreenPtr;
  9.  
  10. PROCEDURE Request(win:WindowPtr; VAR body,pos,neg:ARRAY OF CHAR):BOOLEAN;
  11. (* win : Requester erscheint im gleichen Screen wie win           *)
  12. (* body: Requestertext. Kann mit | in mehrere Zeilen geteilt werden.  *)
  13. (* pos,: Text für Bestätigungs- und Abbruchsgadget               *)
  14. (* neg : (z.B. OK,CANCEL od. YES,NO ...) Für pos kann auch Leerstring *)
  15. (*       übergeben werden, Requester enthält dann nur ein Gadget.     *)
  16.  
  17. PROCEDURE Info(win:WindowPtr);
  18.  
  19. PROCEDURE GetLimits(s:ScreenPtr;
  20.                     VAR rmin,rmax,imin,imax:LONGREAL;
  21.                     VAR maxiter:LONGINT);
  22.  
  23. END Request.def
  24.